/**
 * @type {Number}
 *
 * @properties={typeid:35,uuid:"EBE8848E-54BA-4E68-A640-FD095446CC02",variableType:4}
 */
var found = null;

/** 
 *
 * @properties={typeid:24,uuid:"4EF7A370-2462-4C8F-8279-14F9E0CA4052"}
 * @AllowToRunInFind
 */
function buscar_pendientes() 
{	
	globals.gtotal_saldo = 0
	// para traer solamente los que tienen saldo y son debito  
	if (globals.marca_primer_find == 0)
	{
		globals.marca_primer_find=1
		var estado=forms.ctacte_pr_list_opago.controller.find()
		if (estado != true)  //02/07/2010
		{
			globals.gMensaje="Error al buscar movimientos pendientes"
			globals.gMensajes
			return
		}
		//forms.ctacte_pr_list_opago.saldo > 0  no dad error
		forms.ctacte_pr_list_opago.saldo = '> 0'
		//02/07/2010 debe mostrar creditos - forms.ctacte_pr_list_opago.ctacte_pr_to_tab_mov_pr.d_h=2 //contrario a ventas ?	
		forms.ctacte_pr_list_opago.proveedor_id=forms.opago_1.proveedor_id
		
		if (forms.opago_1.fPagoTerceros == 1)
		{
			cod_mov = 15
		}
		else
		{
			cod_mov = "!15"
		}	
		found = forms.ctacte_pr_list_opago.controller.search()
		
		if (found <= 0)
		{
			globals.gMensaje="No hay mov. de ctacte con saldo"
			globals.gMensajes
		}
	}
}

/**
 * @properties={typeid:24,uuid:"67D0FACE-1516-4586-9735-187A88139478"}
 */
function confirmar_seleccion() 
{
	//borrar  lo que tenga en op_detalle_comprob 
	forms.opago_1.op_cabecera_to_op_detalle_comprob.deleteAllRecords()
	
	//otra recorrida como la anterior para los marcados = 1
	found = forms.ctacte_pr_list_opago.controller.getMaxRecordIndex()	
	if (found > 0)
	{
		globals.gtotal_comprob = 0 
		globals.gtotal_neto_retencion = 0  // 06/11/2013
		var aux_saldo = 0 // 02/07/2010 para que considere signo del movto 
		for (var i = 1 ; i <= forms.ctacte_pr_list_opago.controller.getMaxRecordIndex(); i++)
		{		 
			forms.ctacte_pr_list_opago.controller.setSelectedIndex(i)
			if (forms.ctacte_pr_list_opago.marcado_ctacte == 1)
			{
				//grabar lo que marcado en detalle_comprob
				forms.opago_1.op_cabecera_to_op_detalle_comprob.newRecord()
				//  llenar datos
				forms.opago_1.op_cabecera_to_op_detalle_comprob.cod_mov = cod_mov
				forms.opago_1.op_cabecera_to_op_detalle_comprob.fecha = fecha_mov
				forms.opago_1.op_cabecera_to_op_detalle_comprob.importe = globals.redondeo(saldo)
				forms.opago_1.op_cabecera_to_op_detalle_comprob.imp_original = globals.redondeo(saldo)
				forms.opago_1.op_cabecera_to_op_detalle_comprob.nro_comprobante = nro_factura
				forms.opago_1.op_cabecera_to_op_detalle_comprob.letra = letra
				forms.opago_1.op_cabecera_to_op_detalle_comprob.sucursal = sucursal
				if (concepto == null)
					concepto=" ";
				forms.opago_1.op_cabecera_to_op_detalle_comprob.concepto = concepto
				// agregado porque no podia desmarcar ctacte en opago_1
				forms.opago_1.op_cabecera_to_op_detalle_comprob.ctacte_pr_id = ctacte_pr_id
				// 02/07/2010 para que considere signo del movto
				if (ctacte_pr_to_tab_mov_pr.d_h == 1)
				{
				  	aux_saldo = globals.redondeo(saldo * (-1))
				}
				else
				{
				  	aux_saldo = globals.redondeo(saldo) 
				} 
				globals.gtotal_comprob+= aux_saldo
				//////////////////////////////////////////////////////////////// 06/11/2013
				forms.opago_1.op_cabecera_to_op_detalle_comprob.neto_retencion = globals.redondeo(neto_retencion  * saldo / importe)
				forms.opago_1.op_cabecera_to_op_detalle_comprob.neto_retencion_signo = globals.redondeo(neto_retencion_signo  * saldo / importe)
				globals.gtotal_neto_retencion += forms.opago_1.op_cabecera_to_op_detalle_comprob.neto_retencion_signo
				////////////////////////////////////////////////////////////////
			}
		}
		forms.opago_1.f_neto_reten = globals.redondeo(globals.gtotal_neto_retencion)   // 06/11/2013
	}
	
	// por final todo ok hacer close del form
	var $win = application.getWindow('ctacte_opago')
	$win.hide()
	$win.destroy()
	//application.closeFormDialog('ctacte_opago')
}

/**
 *
 * @properties={typeid:24,uuid:"44962668-E398-4BF3-A408-D24813357B4B"}
 */
function marcar_todo() 
{
	var $total = databaseManager.getFoundSetCount(foundset)
	for (var i = 1 ; i <= $total; i++)
	{
		var $rcd = foundset.getRecord(i)
	  	$rcd.marcado_ctacte = 1
	}
	totales()	
}

/**
 *
 * @properties={typeid:24,uuid:"9E15BE6C-54DE-4DA2-82CD-3254042E18FE"}
 */
function desmarcar_todo() 
{
	globals.gtotal_comprob=0
	var $total = databaseManager.getFoundSetCount(foundset)
	for (var i = 1 ; i <= $total; i++)
	{
		var $rcd = foundset.getRecord(i)
	  	$rcd.marcado_ctacte = 0
	}
}

/**
 *
 * @properties={typeid:24,uuid:"6250EBBB-E99D-4CF0-BA8C-8FA7D0511A2F"}
 */
function totales() 
{
	globals.gtotal_comprob=0 
	var aux_saldo=0 // 02/07/2010 para que considere signo del movto 
 	var $total = databaseManager.getFoundSetCount(foundset)
	for (var i = 1 ; i <= $total; i++)
	{
		var $rcd = foundset.getRecord(i)
	  	if ($rcd.marcado_ctacte==1)
	  	{
		  	if ($rcd.ctacte_pr_to_tab_mov_pr.d_h == 1)
		 	{
			  	aux_saldo = globals.redondeo($rcd.saldo * (-1))
		  	}
		 	 else
		  	{
			  	aux_saldo = globals.redondeo($rcd.saldo) 
		  	}
	  		globals.gtotal_comprob += aux_saldo
	  	}
	}
	//forms.ctacte_pr_list_opago.controller.setSelectedIndex(indice_actual); // 05/01/2011
	globals.opago_diferencia(); // 03/09/2010
}
